function [PH,ax]=FeDecSoloPlot(FeDec,ColorList,ax)

%% Preliminary Setup
[Num_V,Num_Obs]     =   size(FeDec);
XVec                =   (0:1:Num_Obs-1)';
%% Generate the Graph
% Plots
if nargin<6
    ax              =   gca;
end

if Num_V==1
    ColorList   =   {ColorList};
end

PH   =   area(ax,XVec,FeDec');
if nargin>2 && ~isempty(ColorList)
    for ii=1:length(ColorList)
        PH(ii).FaceColor     =   ColorList{ii};
    end
end

hold off;

%% Setup Limits and Ticks
% Y-Axis
ax.YLim                 =   [0,1];
ax.YTick                =   (0:0.2:1)';
ax.YGrid                =   'on';
ax.YAxis.FontSize       =   14;

% X-Axis
ax.XLim                 =   [0,Num_Obs-1];
% X-Axis Interval
NumInterval         =   6;
RoundUnit           =   4;
XInterval           =   ceil(Num_Obs/NumInterval/RoundUnit)*...
                        RoundUnit;
XTicksVec           =   (0:XInterval:ceil((Num_Obs-1)/XInterval)*XInterval)';
XTicksVec           =   XTicksVec(XTicksVec<=Num_Obs);
ax.XTick            =   XTicksVec;
ax.XAxis.FontSize   =   14;
ax.XGrid            =   'on';

